home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 07-10.C < prev    next >
Text File  |  1991-05-05  |  463b  |  26 lines
  1. main()
  2. {
  3.    int old_mode;
  4.    double half;
  5.    double fg_swlength();
  6.  
  7.    old_mode = fg_getmode();
  8.    fg_setmode(16);
  9.    fg_initw();
  10.    fg_setworld(0.0,6.39,0.0,3.49);
  11.    fg_setsizew(0.21);
  12.  
  13.    fg_setcolor(7);
  14.    half = fg_swlength(" Hello there. ",14) * 0.5;
  15.    fg_rectw(3.2-half,3.2+half,1.6,1.9);
  16.  
  17.    fg_setcolor(10);
  18.    fg_movew(3.2,1.65);
  19.    fg_swtext("Hello there.",12,0);
  20.  
  21.    fg_waitkey();
  22.  
  23.    fg_setmode(old_mode);
  24.    fg_reset();
  25. }
  26.